Set objArgs = WScript.Arguments
URL = objArgs(0)
Dim wsh
Set wsh=WScript.CreateObject("WScript.Shell")
wsh.Run URL